'
' Color Lines - Digital Wizard's Lab example
' Copyright (C) 2011, Matt Merkulov
'
' All rights reserved. Use of this code is allowed under the
' Artistic License 2.0 terms, as specified in the license.txt
' file distributed with this code, or available from
' http://www.opensource.org/licenses/artistic-license-2.0.php
'

Type TBall Extends LTSprite
	Field Modifier:Int
	
	Method Draw( DrawingAlpha:Double = 1.0 )
		Super.Draw()
		Local OldFrame:Int = Frame
		Visualizer.Image = Profile.Modifiers.TileSet.Image
		Frame = Modifier
		Super.Draw()
		Visualizer.Image = Profile.Balls.TileSet.Image
		Frame = OldFrame
	End Method
End Type